SVL920010036US1 
Shyh-Mei F. Ho, et ol. 
PL/I Metamodel 



1/14 




SVL920010036US1 
Shyh-Mei F. Ho, et al. 
PL/I Metamodel 



2/1 4 



203 
MESSAGE SETS 



205 
\ 



207 



209 



SQL STORED 
PROCEDURES 



LEGACY 
APPLICATIONS 



PROGRAMMING 
LANGUAGES 




FIG. 2 



INVOCATION 


0..* 1..1 


APPLICATION-DOMAIN 


1..1 1..* 


LANGUAGE 


METAMODEL 




INTERFACE METAMODEL 




METAMODEL 


/ 
301 




/ 

303 




S 

305 



FIG. 3 



SVL920010036US1 

Shyh-Mei F. Ho. et al. 
PL/I Metamodel 

3/1 4 



411 



IMS OTMA APPLICATION 
INTERFACE METAMODEL 



I 



I 



FIG. 4 



OTMA 
INVOCATION 
METAMODEL 

— 7 

421 



IMS TRANSACTION 
MESSAGE 
METAMODEL 

7 

423 




1 



C METAMODEL 

s 

427 



507 




FIG. 5 



GENERATION 
TOOL 



GENERATE 



XML 
DOCUMENT 

/ 
511 



-509 



503 



METADATA 
REPOSITORY 



505 



STORE 



CAM 
A 



OBJECT 
MODELING 



INTERFACE 
DEFINITION 



501 



EXISTING 
APPLICATION 



31- 



COPYBOOKS 
(e.g. COBOL 
SOURCE FILES) 



IMS APPLICATIONS 
CICS APPLICATIONS 



CAM MODEL 
ROSE FILE 



COBOL METAMODEL 
PL/I METAMODEL 

MFS METAMODEL 
BMS METAMODEL 



607 



611 

/ 

IMPORTER 
FRAMEWORK 



609 



JAVA CODE 
FOR THE 
ROSE MODEL 



GENERATE 



TOOLKIT 



603 



GENERATE 



XMI INSTANCE FOR THE 
COPYBOOK, ACCORDING 
TO MODEL 



XML DOCUMENTS 




GENERATE 



DTD AND 
SCHEMA FOR 
ROSE MODEL 



FIG. 6 



S 

605 



SVL920010036US1 

Shyh-Mei F. Ho, et ol. 
PL/I Metamodel 

4/14 




FLOW 
AND MESSAGING 
METAMODEL 




(MIDDLEWARE ) 



713 



METADATA 
REPOSITORY 




APPLICATION 
INTERFACE 
METAMODEL 



INVOCATION AND 
TRANSFORMATION 



RUNTIME 
/U1 CONNECTOR 

FIG. 7 



709 




705 

-A- 



INTERFACE 



703 



EXISTING 
APPLICATION 
PROGRAM 



INTERFACE 
DEFINITION 



805 


807 








/ i 




IMS 




WEBSPHERE 


CONNECTOR 






FOR JAVA 






♦ \ 



SOAP 
COMPLIANT 
XML 
DOCUMENTS , 



PERFORM DATA 
TRANSFORMATION 



SOAP COMPLIANT 
XML DOCUMENT 



803 



811 



XMI 

INSTANCE FOR 
CAM MODEL 



7" 

809 



XML 
REPOSITORY 



IMS 
CONNECT- 



813 



IMS 



815 



CONTROL 
REGION 



MPP/IFP/BMP 



TRANSACTIONAL 
APPLICATION 
PROGRAM 



fig. a 



SVL920010036US1 

Shyh-Mei F. Ho, et al. 
PL/I Metamodel 

5/1 4 















a> 






E 






CD 

LU 






cn 






cz 






o 












Q 













CD 

E 

CD 

LlJ 

-o 

CD 

Q_ 
>n 
I — 
Cn 
CZ 

o 



CD 
O 



tn 



CD 

E 
_a> 

UJ 

cn 

cz 

o 



/\ 

"O 
CD 
.> 

" v 

CD 
"O 
\/ 
V 



Z3 
O 

cn 



CO 

to 
o 

O 
Cn 

cz 
o 
I 









cz cn 






CD C 






E o 












lu izr 












§ E 


















I — — 







CD 

: ]| ^ 

c E 

CD O 

E 0= 

CD 



CD 
CD 



o 



CD 

-5 

•I = 

B B 



E °- 
3 E 



Cn 
cz 

tn 



CD 
> 
_CD 

B 



CD 






Q_ 






>^ 












"O 






CD 






CO 






o 












E 






o 






c_> 






cn 






CZ 






o 

























CD 






Q_ 






>-s 












"O cn 






CD CZ 






CO o 






O I 






Q_Q 






E »- 






o E 






cn O 






c: ^ 






o 



















CD 


cz 




CL. 


o 




| « ^ 


CD 




CD pH 

co tJ- 


Boo 








§- E 






UUO 


cz 
o 




c_> — 


"cz 




Q_ 


B 











■M ^ 






^ cz 






CO o 






to _J 












e> 












I 1 E 












.3 2 













CD C-?* 

iz: i 

"co Q- 
co 

-2 E 
cj> o 



SVL92G010036US1 

Shyh-Mei F. Ho, et al. 
PL/I Metamodel 

6/14 



PLISimpleType 



PLIComputotionalType 



PLIArithmeticType 



[^mode : ModeValues 



PLIStringType 



PLIIntegerType 



□^precision : Integer 
[^3 scale : Integer 
C^S Signed : Boolean 
[^BigEndian : Boolean = true 



<— PLIPictureStringType 



G^pictureString : String 



PLIFIoatType 



Cubase : BaseValues 
[^precision : Integer 
C^IEEE : Boolean = false 
C^BigEndian : Boolean = true 



PLICodedStringType 



[^type : StringTypeValues 
[^varying : LengthType 



PLIFixedLengthString 



□^length : Integer 



— PLIVariableLengthString 



PLIPackedType 



□^precision : Integer 
□g? scale : Integer 



G^2 lengthToAllocate : String 



PLIPictureType 



[^pictureString : String 



FIG. 1 0A 



o..* 

+ referred In 



PLICIassifier 



SVL92G010036US1 

Shyh-Mei F. Ho, et al. 
PL/I Metamodel 

7/1 4 
0..1 +sharedType 



FIG. 1 0B 



PLINamedType 



PLIComposedType 



L^Union : Boolean 



0..1 



+group 



PLINonComputationalType 



FROM 
FIG. 
10A 



PLILobelType 



PLIFormatType 



PLIEntryType 



C<2 Limited : Boolean 



PLIPointerType 



PLIFileType 



1 



1 



PLIAIios 



Attribute 



C<2 attribute : String 



PLIOrdinal 



[^precision: int 
G^isSigned : boolean 



OrdinalValue 



C^3name : String 
(Rvalue : int 



PLIHandleType 



Cg} structure : tPLlStructure 



PLIStructure 



PLIOffsetType 



C^BigEndian : Boolean = true 



+ referred In 



0..1 



PLIAreaType 



PLIFixedLengthArea 



length : Integer 



PLIVariableLengthArea 



l^> lengthToAllocate : String 



+ referred In 



0..* 



SVL920O1OO36US1 

Shyh-Mei F. Ho, et al. 
PL/I Metamodel 

8/14 



+typedElement 



0..* 



0..* 



+elements 



PLIEIementlnitialValue 



G^initialValue : String 
C^ValueType : PLI InitialValueType 



+ initial 

a.* 



+element 



1..1 



PLIEIement 



O 



level : String 



FROM 
FIG.i 
10B 



1..* 



+arrayOf 



0..1 0..1 
+ array 



PLIArray 



PLISourceText 



[^source : String 
□^fileName : String 



+referredTo 



+ referred In 



PLIFixedBoundArray 



[^Ibound : integer 
C^ubound : integer 



0..* 



+ referred In 



PLIFixedLboundArray 



C^Ibound : Integer 
G^HboundtoAllocate : String 



0..* 



+ referred In 



PlIHboundArray 



C^LboundtoAllocate : String 
C^ubound : Integer 



0..* 

+ referred In 
0..* 



PLIVariableBoundArray 



LboundToAllocate : String 
C^HboundToAllocote : String 



FIG. 1 0C 



SVL920O1OO36US1 
Shyh-Mei F. Ho, et ol. 
PL/I Metamodel 



9/14 



FIG. 1 1 





TDLangElement 
(from TDLang) 








f 

+dataltem 


datoltem 
0..* 

1..1 




PlatformCompilerType 
(from TypeDescriptor) 


C3 platformCompilerType : String 





<<enumerotion» 
■ModeValues 



[3 REAL 
L3 COMPLEX 



Expression 



[^String 



<<enumeration>> 
BoseValues 



L3 BINARY 
L3 DECIMAL 



<<enumerotion>> 
PLIInitialValueType 



L3 INITIAL 
L3 INITIALCALL 
L3 INITIALTO 



<<enumerotion>> 
LengthType 



L3N0NVARYING 
L3VARYINGZ 
L3VARYINGBigEndian 
raVARYINGLittleEndian 



F/C. / 5 



<<enumeration» 
StringTypeValiies 



BIT 

0 CHARACTER 
L3WIDECHAR 
13 GRAPHIC 



3901 




3943 



3923 



FIG. 1 6 



3933 



SVL920010036US1 

Shyh-Mei F. Ho, et ol. 
PL/I Metamodel 

10/14 



o 

a> 

E 
zj 
cz 
a> 
V 
V 



-o 
o 

Q_ 
CD 

O 



oo 

co * — OJ OJ 
«— CNI ro m CO «— 

CD CL> CD CD CD CD 
-O T> "O -O TD TD 
O O O O O O 

E E E E E E 

HBBBBB 









<^ CO 


X 

i 




otioi 
imal 




<enumer 
ickedDec 


to CsJ 




=3 CO 

C-> o 

£ £ 




2 2 z 






BBS 





o 



CD 

E 

Z> 
CZ 
CD 
V 
V 



o 
m 

CO 

<D 
o 
o 
o 





>*% 


CD 


cz 


c 




O 


o 




"O 


JD 




o 




o 


CD 




CD 









co 
co 
a> 
o 



CD 

E 



CD 
V 
V 



CD o 

-2 X ^~ "° 

— CO CO CD 

_ <C O <C -o 

•O "O "O -o cz 

CD CD CD CD CD 

^> "O "O "D "O t2 XX 

.<D C C C C g 0> _fD 

^ CD CD CD (U Ji: X I 

*X "x "x ^X ogg 

S CD (U <D <D C S 2 

g- LJ LJ U LJ U ^ | 

LULULULULUmpD 

BBBBBBBB 



.9 '-6 

e I 

E^ 
a> cz 
V 



CD 
X 



CD 

_ ^ O 

en "S3 ~ 
cz 

CD 



Q_ £ 
£ CD 

ZJ 



CD ^' == 



EBB 



o 

CD 

E 

Z5 
CZ 
CD 
V 
V 



o 



*co 



CD 

E 

CD 
Q_ 

E 
o 

CO 

o 



CD 

ECU 

52- ~ c/> 



CO 



o 



E 
o 

CO 
CD 



O CO KJ 



CD CD 
if CO ^ 

CD .5* 

J= CZ O CO 

.9^ o o cz 



o 
E 
"o 

CD 

"O 
CD 
CZ 
CD 

'to 

cz 



BBBBBBH 



25 

i ° 

CD 

V 
V 



CD 
-Q 



CD ^ 

B B B B 



SVL92G010036US1 

Shyh-Mei F. Ho, et ol. 
PL/I Metamodel 

/ 1/14 









PLISimpleType 







PLIComputotionalType 











PLIArithmeticType 




PLIStringType 


G^mode : ModeValues 







PLIIntegerType 



precision : Integer 

scale : Integer 
[^Signed : Boolean 
C^BigEndian : Boolean = true 



PLIPictureStringType 



G^pictureString : String 



PLIFIoatType 



Cubase : BaseValues 
[^precision : Integer 
[^2 IEEE : Boolean = false 
[^BigEndian : Boolean = true 



PLICodedStringType 



C^3type : StringTypeValues 
["^varying : LengthType 



. — PLI FixedLengthString 



length : Integer 



PLIPackedType 



[^precision : Integer 
scale : Integer 



PLIVariableLengthString 



C^lengthToAllocate : String 



PLIPictureType 



C73 pictureString : String 



0..* 

+ referred In 



FIG. 1 3A 



PLICIossifier 



Genome : String 



SVL920O1OO36US1 
Shyh-Mei F. Ho, et al. 
PL/I Metamodel 



12/14 
0..1 +sharedType 



FIG. 1 3B 



PLINomedType 



PLIComposedType 



L^Union : Boolean 



0..1 



+group 



PLI NonComputationalType 



FROM 
FIG. * 
13A 



PLILabelType 



PLIFormatType 



PLIEntryType 



£3 Limited : Boolean 



PLIPointerType 



PLIFileType 



1 



PLIAIias 



Attribute 



(^attribute : String 



PLIOrdinal 



[^precision: int 
G^isSigned : boolean 



OrdinalValue 



G^name : String 
Rvalue : int 



PLIHandleType 



[^structure : tPLIStructure 



PLIStructure 



PLIOffsetType 



[^BigEndian : Boolean = true 



+ referred In 



0..1 



PLIAreaType 



PLIFixedLengthArea 



^length : Integer 



PLIVariableLengthArea 



lengthToAllocote : String 



+ referred In 



0..* 



SVL920O1OO36US1 
Shyh-Mei F. Ho, et al. 
PL/I Metamodel 

13/14 



+typedElement 



0..* 



0..* 



+elements 



PLIEIementlnitialValue 



C^initialValue : String 
C^ValueType : PLIInitialValueType 



+initial 
0..* 



+element 



1..1 



PLIEIement 



level : String 



FROM 
FIG. -fe 
13B 



1..* 



+arrayOf 



0.-1 0..1 
+orroy 



PLIArray 



PLISourceText 



[^source : String 
[^fileName : String 



11. .1 

+ refer redTo 



PLIFixedBoundArray 



C^lbound : integer 
[^ubound : integer 



+ referred In 



0..* 



+ referred In 



PLI FixedLboundArray 



C^Ibound : Integer 
HboundtoAllocote : String 



0..* 
+ referred In 



PlIHboundArray 



LboundtoAllocate : String 
G^ubound : Integer 



0..* 

+ referred In 
07* 



PLIVariableBoundArray 



LboundToAliocate : String 
HboundToAllocate : String 



FIG. 1 3C 



4021 



4013 



4010 



E-MAIL ENABLED 
APPLICATIONS 

E-MAIL 
SCHEDULE/CALENDAR 
WORD PROCESSOR 
SPREAD SHEET 
GRAPHICS 
CTI 



MESSAGE APIs 



OPERATING SYSTEM - 



SVL92G010036US1 

Shyh-Mei F. Ho, et al. 
PL/I Metamodel 

14/14 



E-MAIL SERVER 
E-MAIL DATA BASE 
DIRECTORY SERVER 
REPLICATION DATA BASE 

CONNECTOR 




4025 
4027 



CONNECTOR 

E-MAIL SERVER 
E-MAIL DATA BASE 
DIRECTORY SERVER 
REPLICATION DATA BASE 



4023 



E-MAIL ENABLES 
APPLICATIONS 

E-MAIL 
SCHEDULE/CALENDAR 
WORD PROCESSOR 
SPREAD SHEET 
GRAPHICS 
CTI 



MESSAGE APIs 



OPERATING SYSTEM 



\ 

4020 



4011 



4015 
4017 



FIG: 17 



4103 




